home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX 6.2 Development Libraries
/
SGI IRIX 6.2 Development Libraries.iso
/
dist
/
complib.idb
/
usr
/
share
/
catman
/
p_man
/
cat3
/
complib
/
scfftm1du.z
/
scfftm1du
Wrap
Text File
|
1996-03-14
|
7KB
|
133 lines
ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF)))) ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF))))
NNNNAAAAMMMMEEEE
ssssccccffffffffttttmmmm1111dddduuuu,,,, ddddzzzzffffffffttttmmmm1111dddduuuu ---- Multiple 1D, Real to Complex, Direct Fast Fourier
Transforms.
SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
_F_o_r_t_r_a_n :
ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssccccffffffffttttmmmm1111dddduuuu(((( ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, aaaarrrrrrrraaaayyyy,,,, iiiinnnncccc,,,, llllddddaaaa,,,, ccccooooeeeeffff ))))
iiiinnnntttteeeeggggeeeerrrr ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, iiiinnnncccc,,,, llllddddaaaa
rrrreeeeaaaallll aaaarrrrrrrraaaayyyy((((llllddddaaaa,,,,pppp)))),,,, ccccooooeeeeffff((((nnnn++++11115555))))
ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ddddzzzzffffffffttttmmmm1111dddduuuu(((( ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, aaaarrrrrrrraaaayyyy,,,, iiiinnnncccc,,,, llllddddaaaa,,,, ccccooooeeeeffff ))))
iiiinnnntttteeeeggggeeeerrrr ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, iiiinnnncccc,,,, llllddddaaaa
rrrreeeeaaaallll****8888 aaaarrrrrrrraaaayyyy((((llllddddaaaa,,,,pppp)))),,,, ccccooooeeeeffff((((nnnn++++11115555))))
_C :
####iiiinnnncccclllluuuuddddeeee <<<<fffffffftttt....hhhh>>>>
iiiinnnntttt ssssccccffffffffttttmmmm1111dddduuuu (((( iiiinnnntttt ssssiiiiggggnnnn,,,, iiiinnnntttt nnnn,,,, iiiinnnntttt pppp,,,, ffffllllooooaaaatttt ****aaaarrrrrrrraaaayyyy,,,,
iiiinnnntttt iiiinnnncccc,,,, iiiinnnntttt llllddddaaaa,,,, ffffllllooooaaaatttt ****ccccooooeeeeffff))));;;;
iiiinnnntttt ddddzzzzffffffffttttmmmm1111dddduuuu (((( iiiinnnntttt ssssiiiiggggnnnn,,,, iiiinnnntttt nnnn,,,, iiiinnnntttt pppp,,,, ddddoooouuuubbbblllleeee ****aaaarrrrrrrraaaayyyy,,,,
iiiinnnntttt iiiinnnncccc,,,, iiiinnnntttt llllddddaaaa,,,, ddddoooouuuubbbblllleeee ****ccccooooeeeeffff))));;;;
DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
ssssccccffffffffttttmmmm1111dddduuuu and ddddzzzzffffffffttttmmmm1111dddduuuu compute the complex Fourier transform of P real
sequences of N samples each. The k-th index F(k) of the Transform of an N
sample sequence f(i) is equal to:
F(k) = Sum ( W^(i*k) * f(i) ), for i =0, ..., (N-1)
W = exp( (Sign*2*sqrt(-1)*PI) / N )
The Fourier transforms are computed in-place so the input sequence is
overwritten by the Fourier transform output. As the input sequences have
real values, only half of the results are computed since the (N-k)-th
sample of the transform would be the conjugate of the k-th sample.
However, some extra space is necessary. For an N sample input sequence,
the complex output of the transform takes ((N+2)/2) complex values. This
represents either N+1(odd case) or N+2(even case) real values, that's one
or two more real values than the input.
PPPPAAAARRRRAAAAMMMMEEEETTTTEEEERRRRSSSS
SSSSIIIIGGGGNNNN Integer specifying which sign to be used for the expression of W
(see above) - must be either +1 or -1. Unchanged on exit.
NNNN Integer, the number of samples in each sequence. Unchanged on exit.
PPPP Integer, the number of sequences. Unchanged on exit.
PPPPaaaaggggeeee 1111
ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF)))) ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF))))
AAAARRRRRRRRAAAAYYYY Array containing the samples of the sequence to be transformed.
On input, the element "i" of the sequence "j" is stored as A(i*inc,j) in
_F_o_r_t_r_a_n , and A[i*inc+j*lda] in _C.
On exit, the array is overwritten by its transform.
IIIINNNNCCCC Integer, increment between two consecutive elements of a sequence.
Unchanged on exit.
LLLLDDDDAAAA Integer, leading dimension: increment between the first samples of
two consecutive sequences. Unchanged on exit.
CCCCOOOOEEEEFFFFFFFF Array of at least ( N + 15 ) elements. On entry it contains the
Sines/Cosines and factorization of N. COEFF needs to be initialized with
a call to scfftm1dui or dzfftm1dui. Unchanged on exit.
EEEExxxxaaaammmmpppplllleeee ooooffff CCCCaaaalllllllliiiinnnngggg SSSSeeeeqqqquuuueeeennnncccceeee
1D FFTs computed on 64 sequences of 1024 real values each. The elements
of each sequence are stored with increment (stride) 1, and the offset
between the first element of two succesive sequence (leading dimension)
is 1026.
Note : 1026 >= 1024+2 .
_F_o_r_t_r_a_n
real array(0:1026-1,0:64-1), coeff(1024+15)
call scfftm1dui( 1024, coeff)
call scfftm1du( -1, 1024, 64, array, 1, 1026, coeff)
_C
#include <fft.h>
float array[64*1026], *coeff;
coeff = scfftm1dui( 1024, NULL);
scfftm1du( -1, 1024, 64, array, 1, 1026, coeff);
SSSSEEEEEEEE AAAALLLLSSSSOOOO
fft, scfftm1dui, dzfftm1dui, scfft1du, dzfft1du, csfftm1du, zdfftm1du
PPPPaaaaggggeeee 2222